home *** CD-ROM | disk | FTP | other *** search
/ PC-Blue - MS DOS Public Domain Library / PC-Blue MS-DOS Public Domain Library - NYACC.iso / vol350 / prolog.arc / CAD.ARC / DREXATGS.ARC / SIMCIR.PRO < prev   
Encoding:
Text File  |  1987-04-05  |  384 b   |  21 lines
  1. .he                           SIMCIR.PRO
  2.  
  3.  
  4.  
  5. inputs( [n1,n2,n3,n4] ).
  6. outputs( [n6,n7] ).
  7. elements( [o1,p1,p2] ).
  8.  
  9. o1( and2, 2, [n1,n2], n5 ).
  10. p1( and2, 2, [n3,n5], n6 ).
  11. p2( and2, 2, [n4,n5], n7 ).
  12.  
  13. n1( 1, x1, [o1] ).
  14. n2( 2, x2, [o1] ).
  15. n3( 3, x3, [p1] ).
  16. n4( 4, x4, [p2] ).
  17. n5( 5, o1, [p1,p2] ).
  18. n6( 6, p1, [f1] ).
  19. n7( 7, p2, [f2] ).
  20.  
  21.